home *** CD-ROM | disk | FTP | other *** search
/ Wild Blue Yonder 1: 50 Years of Gs & Jets / Wild Blue Yonder - Episode 1 - 50 Years of Gs and Jets (Digital Ranch) (Spectrum Holobyte)(1-107-40-101)(1994).iso / control / panel.dir / 00743_Script_743 < prev    next >
Text File  |  1994-08-29  |  2KB  |  47 lines
  1. on initControls
  2.   
  3.   global bgSlider, bgTrack, bgVol, biteSlider, biteTrack, biteVol, controller, ¼
  4.          engineVol, engineTrack, engineSlider, mooVVol, mooVSlider, mooVTrack, ¼
  5.          noController, showController, sliderCast, sliderMin, sliderScale, volumes
  6.   
  7.   set the puppet    of sprite mooVSlider   = TRUE
  8.   set the puppet    of sprite biteSlider   = TRUE
  9.   set the puppet    of sprite engineSlider = TRUE
  10.   set the puppet    of sprite bgSlider     = TRUE
  11.   set the immediate of sprite mooVSlider   = TRUE
  12.   set the immediate of sprite biteSlider   = TRUE
  13.   set the immediate of sprite engineSlider = TRUE
  14.   set the immediate of sprite bgSlider     = TRUE
  15.   
  16.   set sliderMax   = the top of sprite mooVTrack
  17.   set sliderMin   = the bottom of sprite mooVTrack
  18.   set sliderScale = 255.00/(sliderMin - sliderMax)
  19.   
  20.   set the locV of sprite mooVSlider   = sliderMin - volumes( mGet, mooVVol )  /sliderScale
  21.   set the locV of sprite biteSlider   = sliderMin - volumes( mGet, biteVol )  /sliderScale
  22.   set the locV of sprite engineSlider = sliderMin - volumes( mGet, engineVol )/sliderScale
  23.   set the locV of sprite bgSlider     = sliderMin - volumes( mGet, bgVol )    /sliderScale
  24.   updateStage
  25.   
  26.   set the castNum of sprite bgSlider     = sliderCast
  27.   set the castNum of sprite biteSlider   = sliderCast 
  28.   set the castNum of sprite engineSlider = sliderCast 
  29.   set the castNum of sprite mooVSlider   = sliderCast 
  30.   
  31.   set the constraint of sprite mooVSlider    = mooVTrack
  32.   set the constraint of sprite biteSlider    = biteTrack
  33.   set the constraint of sprite engineSlider  = engineTrack
  34.   set the constraint of sprite bgSlider      = bgTrack
  35.   
  36.   set the buttonStyle = 1
  37.   
  38.   if showController then
  39.     set the hilite of cast controller    = TRUE
  40.     set the hilite of cast noController  = FALSE
  41.   else
  42.     set the hilite of cast controller    = FALSE
  43.     set the hilite of cast noController  = TRUE
  44.   end if
  45.   
  46. end initControls
  47.